// Computer Program Listing Appendix Under 37 CFR 1 .52(e) 
// dsre.c 

// Copyright (c) 2004. Sybase, Inc. All Rights Reserved. 

r 

** Confidential property of Sybase, Inc. 
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/* 

** This file has the database SRE routines: 

** 

** External Functions: 

** 

** dsre_build_dsre 

** dsre_rebuild_dsre 

** dsre_add_TnFnXnD_site 

** dsre_remove_TnFnXnD_site 

** dsre_resolve 

** 

** Internal Functions: 



** _dsre_build_TnFnXnD 
** _dsre_init_dsre 
** _dsre_add_TnFnXnD_entry 
** ll_k_ins_ascent 
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#include <dsre.h> 
#define NUM_NSI_TABLES 4 
#define NUM_HTS_TABLES 4 
#define NUM_DSRE_BITMAPS 5 
#define DSRE_NSI_TABLE_SIZE_C 7 

STATIC_FUNC VOID_FUNC _dsre_init_dsre PROTOTYPE(( 

DISTJNFO *dist_info, 

RSHANDLE * RSHANDLE)); 

STATIC_FUNC VOID_FUNC _dsre_build_TnFnXnD PROTOTYPE(( 

DISTJNFO *dist_info, 

LL_HDR *hdr, 

RSHANDLE * RSHANDLE)); 

STATIC_FUNC VOID_FUNC _dsre_add_TnFnXnD_entry PROTOTYPE^ 

DSREJNFO *dsre, 

CSJNT status, 

OBJ_DBSUBSETS *nameset, 

CSJNT len, 

SITEID dbid, 

CS_BOOL truncate, 

RSHANDLE * RSHANDLE)); 

STATIC_FUNC VOID_FUNC ll_kjns_ascent PROTOTYPE^ 

LL_HDR *hdr, 

VOID *item, 

LL_K_ELE *ele, 

CSJNT len, 

VOID *key)); 



I* 

** _DSRE_INIT_DSRE 

** 

** Type of function: Internal. 

** 

** Purpose: 

** Allocate memory for the database SRE of a distributor 

** 

** Parameters: 

** DISTJNFO *dist_info (input) 

** A structure containing all information about the DIST 
** thread. 

** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre becomes an active database resolution engine. 

** 
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STATIC_FUNC VOID_FUNC 

_dsre_init_dsre(dist_info, RSHANDLE) 

DISTJNFO *dist_info; 
RSHANDLE * RSHANDLE; 

{ 

CSJNT num_bits; 
MEM_EXPAND_HDR *memhdr; 
CSJNT synclnfo; 
if (distJnfo->dist_dsre != NULL) 
return; 

memhdr = (MEM_EXPAND_HDR*)NULL; 
/* Allocate memory for dist_dsre structure. 7 
mem_allocate(&memhdr, 

(BYTE**) &dist_info->dist_dsre, 

sizeof(DSREJNFO), 

MEM_EXPANSION_C, RSHANDLE); 

MEMZERO(distJnfo->dist_dsre, sizeof(DSREJNFO)); 
distJnfo->dist_dsre->dsre_memhdr = memhdr; 

mem_unlink_hdr(distJnfo->dist_dsre->dsre_memhdr, RSHANDLE); 

dist_info->dist_dsre->dsreJn = hts_create_nested("TABLE NSI", 

DSRE_NSI_TABLE_SIZE_C, hts_h_char1, NULL, RSHANDLE); 

dist_info->dist_dsre->dsreJn = hts_create_nested("FUNCTION NSI", 

DSRE_NSI_TABLE_SIZE_C, hts_h_char1, NULL, RSHANDLE); 

dist_info->dist_dsre->dsre_xn = hts_create_nested('TRANSACTION NSI", 

DSRE_NSI_TABLE_SIZE_C, hts_h_char1, NULL, RSHANDLE); 

dist_info->dist_dsre->dsre_spn = hts_create_nested("SYSSP NSI", 

DSRE_NSI_TABLE_SIZE_C, hts_h_char1, NULL, RSHANDLE); 



mem_unlink_hdr(distJnfo->dist_dsre->dsre_tn->memhdr, RSHANDLE); 

mem_unlink_hdr(distJnfo->dist_dsre->dsre_fn->memhdr, RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_xn->memhdr, RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_spn->memhdr, RSHANDLE); 

/* 

** Allocate the bitmaps for dsre_*_default. 

** These bitmaps are allocated once and kept used for 

** life span of the dsre. 
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num_bits = sm_get_num_sites(SM_GLOBAL_INFO, RSHANDLE); 

b m_g et_b m ( n u m_b its , num_bits, 

&dist_info->dist_dsre->dsre_tn_default, RSHANDLE); 

b m_g et_b m ( n u m_b its , num_bits, 

&dist_info->dist_dsre->dsre_fn_default, RSHANDLE); 

b m_g et_b m ( n u m_b its , num_bits, 

&dist_info->dist_dsre->dsre_xn_default, RSHANDLE); 

b m g et b m ( n u m b its , num_bits, 

&dist_info->dist_dsre->dsre_spn_default, RSHANDLE); 

b m_g et_b m ( n u m_b its , num_bits, 

&dist_info->dist_dsre->dsre_subsites, RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_tn_default->bm_memhdr, 
_RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_fn_default->bm_memhdr, 
RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_xn_default->bm_memhdr, 
RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_spn_default->bm_memhdr, 
RSHANDLE); 

mem_unlink_hdr(dist_info->dist_dsre->dsre_subsites->bm_memhdr, 

RSHANDLE); 

mem_transfer_hdr(dist_info->dist_dsre->dsre_memhdr, 

&((RSHANDLE_INFO*)G->g_rshandle_info)->rsinfo_global_rshandle.rs_exc_chain); 

} 

/* 

** DSRE_BUILD_DSRE 

** 

** Type of function: External. 

** 

** Purpose: 

** Builds the database SRE for a distributor 

** 

** Parameters: 

** DISTJNFO *dist_info (input) 

** A structure containing all information about the DIST 
** thread. 

** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 



** Returns: 
** VOID. 



** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre becomes an active database resolution engine. 

** 
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VOID_FUNC 

dsre_build_dsre(dist_info, RSHANDLE) 

DISTJNFO *dist_info; 

RSHANDLE * RSHANDLE; 

{ 

STSJHANDLE *stsh; 
OBJ_RSSUBSCRIPTIONS subrow; 
CS_CHAR where[MAX_STRING_LEN_C+ 1]; 
LLJHDR subjst; 

M E M EX PAN D_H D R *dsre_memhdr; 
LL K SITEID *siteid; 

stsh = sts_begin_trans( M Build_DSRE", RSHANDLE); 

SPRINTF(where, "pdbid = %ld and primary_sre = 1 and (type & %d) = %d", 
dist_info->dist_l_siteid, SUB_TYPE_DBSUB_M, SUB_TYPE_DBSUB_M); 

if (sts_exec_select(stsh, STS_SELECTOBJ_C, 
STS_TABLENAME(TYPE_RSSUBSCRIPTIONS_C), where, 
TYPE_RSSUBSCRIPTIONS_C, NULL, 0, RSHANDLE) == CS_END_DATA) 

{ 

stsh = sts_end_trans(stsh, STS_COMMIT_C, RSHANDLE); 

return; 

} 

ll_init(&sub_lst); 

dsre_memhdr = (MEM_EXPAND_HDR*)NULL; 

while (sts_get_row(stsh, &subrow, TYPE_RSSUBSCRIPTIONS_C, RSHANDLE) 

!= CS_END_DATA) 

{ 

mem_allocate(&dsre_memhdr, (BYTE**) &siteid, 
sizeof(LL_K_SITEID), MEM_EXPANSION_C, RSHANDLE); 

SITEID_COPY(siteid->dbid, subrow.obj_sub.sub_dbid); 

RSID_COPY(siteid->repid, subrow.obj_sub.sub_objid); 

if (subrow.obj_sub.sub_status & SUB_STAT_ALLOW_TRUNC_M) 
siteid->allow_truncate = CS_TRUE; 

else 

siteid->allow_truncate = CS_FALSE; 
/* The subjst is an ascent list sorted by repid. 7 
ll_k_ins_ascent(&sub_lst, siteid, &siteid->ele, sizeof(RSID), 
&siteid->repid); 

} 

stsh = sts_end_trans(stsh, STS_COMMIT_C, RSHANDLE); 

if (dsre_memhdr != NULL) 
{ 

_dsre_build_TnFnXnD(dist_info, &sub_lst, RSHANDLE); 

ll_init(&sub_lst); 

mem_free(dsre_memhdr, RSHANDLE); 



} 

} 

r 

** DSRE_ADD_TnFnXnD_SITE 

** 

** Type of function: External. 

** 

** Purpose: 

** This is the external version of _dsre_build_TnFnXnD function. 

** unlike _dsre_build_TnFnXnD, this function just processes one database 

** subscription. 

** 

** Parameters: 

** DISTJNFO *dist_info (input/output) 
** Pointer to the Distributor structure. 
** SITEID pdbid (input) 

** The primary dbid which is the source database of the dbrep. 
** We will use this dbid to locate the dist_info and its dsre. 
** SITEID dbid (input) 

** The site which newly subscribes to the database repdef. 
** RSID *dbrepid (input) 

** Pointer to the dbrepid of the database repdef. 
** CS_BOOL truncate (input) 
** Does this site subscribe to truncate table. 
** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre grows by adding namesets for the new dbsub. 

** 
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VOID_FUNC 

dsre_add_TnFnXnD_site(dist_info, pdbid, dbid, dbrepid, truncate, RSHANDLE) 

DISTJNFO *dist_info; 
SITEID pdbid; 
SITEID dbid; 
RSID *dbrepid; 
CS_BOOL truncate; 

RSHANDLE * RSHANDLE; 

{ 

LL K SITEID siteid; 
LLJHDR hdr; 

SITEID_COPY(siteid.dbid, dbid); 
RSID_COPY(siteid.repid, *dbrepid); 
if (truncate) 

siteid. allow_truncate = CS_TRUE; 



else 

siteid.allow_truncate = CS_FALSE; 
ll_init(&hdr); 

/* For consistency, we still use ll_k_ins_ascent(), even though 
** we can also use ll_k_insert(). 

7 

ll_k_ins_ascent(&hdr, &siteid, &siteid.ele, 
sizeof(RSID), &siteid.repid); 
_dsre_build_TnFnXnD(dist_info, &hdr, RSHANDLE); 

} 

/* 

** DSRE_REMOVE_TnFnXnD_SITE 

** 

** Type of function: External. 

** 

** Purpose: 

** This routine will remove a site from the DSRE. 

** 

** Parameters: 

** DISTJNFO *dist_info (input) 

** Pointer to the Distributor structure. If this is NULL, use 
** pdbid to find it out. 
** SITEID pdbid (input) 

** The primary dbid which is the source database of the dbrep. 
** We will use this dbid to locate the dist_info and its dsre. 
** SITEID dbid (input) 

** The site which newly drop subscription to the database repdef. 
** RSID *dbrepid (input) 

** Pointer to the dbrepid of the database repdef. 
** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre shrink by removing the site from the related 

** namesets. 

** 
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VOID_FUNC 

dsre_remove_TnFnXnD_site(dist_info, pdbid, dbid, RSHANDLE) 

DISTJNFO *dist_info; 
SITEID pdbid; 
SITEID dbid; 

RSHANDLE * RSHANDLE; 

{ 

DSREJNFO *dsre; 
HTS_TABLE *tmp_table; 



HTS_TABLE *hashtables[NUM_NSI_TABLES]; 
BM_STRUCT *defaultbms[NUM_NSI_TABLES]; 
SM_SITE_ID site_index; 
CS_INT index, hts_index; 

CS_INT synclnfo; /* Error info from the Sync module 7 

if (dist_info == NULL) 

{ 

/* We need to find dist_info for this pdbid. 7 
dist_info = ll_first(&DIST_G->distg_list); 
while (dist_info != (DISTJNFO *)NULL) 
{ 

if (dist_info->dist_l_siteid == pdbid) 
break; 
else 

dist_info = ll_next(&DIST_G->distg_list, 
&dist_info->dist_next); 
} 

} 

if (dist_info == NULL) 
{ 

return; 

} 

dsre = dist_info->dist_dsre; 
hashtables[0] = dsre->dsre_tn; 
hashtables[1] = dsre->dsre_fn; 
hashtables[2] = dsre->dsre_xn; 
hashtables[3] = dsre->dsre_spn; 
defaultbms[0] = dsre->dsre_tn_default; 
defaultbms[1] = dsre->dsre_fn_default; 
defaultbms[2] = dsre->dsre_xn_default; 
defaultbms[3] = dsre->dsre_spn_default; 

site_index = sm_get_index(SM_GLOBAL_INFO, dbid, RSHANDLE); 

b m_reset_b it (ds re- >ds re_s u bs ites , s ite_i ndex ) ; 
if (bm_is_zero_bm(dsre->dsre_subsites)) 
{ 

/* This is the last site subscribing to us. After this 
** is dropped, there is no more database subscription 
** for this primary site. We can drop the DSRE structure. 
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dsre_release_dsre(dist_info->dist_dsre, RSHANDLE); 

dist_info->dist_dsre = NULL; 
return; 

} 

for (index = 0; index < NUM_NSI_TABLES; index++) 
{ 

tmp_table = hashtables[index]; 
bm_reset_bit(defaultbms[index], site_index); 
for (hts_index = 0; hts_index < tmp_table->num_slots; 
hts_index++) 

{ 



LLJHDR *hdr; 

LL K ELE 2 *p; 

BM_STRUCT *tmp_bm; 

/* Traverse the whole list. 7 

hdr = &tmp_table->table[hts_index]; 

p = (LL_K_ELE_2 *)hdr->head; 

while (p != (LL_K_ELE_2 *) hdr) 

{ 

tmp_bm = ((DSRE_ENTRY*)p->link.item)->dsre_e_bitmap; 
bm_reset_bit(tmp_bm, site_index); 
if ( b m i s_ze ro_b m (t m p_b m ) ) 
{ 

LL K ELE 2 *tmp_ele; 
DSRE ENTRY *tmp_entry; 

/* No site subscribes to this nameset, 
** should remove it. 
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tmpele = p; 
p = (LL K ELE 2 *) p->link.next; 
tmp_entry = (DSRE_ENTRY*)tmp_ele->link.item; 

ll_del(&tmp_ele->link); 

mem_free(tmp_entry->dsre_e_bitmap->bm_memhdr, RSHANDLE); 

mem_free(tmp_entry->dsre_e_memhdr, RSHANDLE); 

} 

else 
{ 

p = (LL K ELE 2 *) p->link.next; 
} 

} 

} 

} 

} 

/* 

** DSRE RESOLVE 

** 

** Type of function: External. 

** 

** Purpose: 

** This routine will return a bitmap for sites based on the input 

** name pair. 

** 

** Parameters: 

** DSREJNFO *dsre (input) 

** A structure containing hash tables needed to resolve 

** the name pair. 

** CSJNT type (input) 

** Where this name pair is for table, function or transaction. 
** CS_CHAR *owner (input) 
** The first key of the name pair 
**CS_CHAR *name (input) 



** The second key of the name pair 

** BM_STRUCT *dests (output) 

** The bitmap structure to hold the result. 

** For transaction resolution, we allow this to be NULL. 

** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** 
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VOID_FUNC 

dsre_resolve(dsre, type, owner, name, dests, RSHANDLE) 

DSREJNFO *dsre; 
CSJNT type; 
CS_CHAR *owner; 
CS_CHAR *name; 
BM_STRUCT *dests; 

RSHANDLE * RSHANDLE; 

{ 

HTS_TABLE *nameset; 

BM_STRUCT *def ; 

DSRE_ENTRY *tmp_entry; 

CS_CHAR key 1 [MAXJ D ENTLENC+ 1 ] ; 

CS_CHAR key2[M AX_I D ENT_LEN_C+ 1 ] ; 

CSJNT Ien1, Ien2, Ien3; 

CS_BOOL retry_key1; 

CS_BOOL resolved; 

CS_BOOL found_regular_sub; 

CS_INT num_bits; 

CS_INT synclnfo; 

if (dsre == NULL) 

return; 

num_bits = sm_get_num_sites(SM_GLOBAL_INFO, RSHANDLE); 

switch (type) 
{ 

case DBSUBSET_TYPE_TABLE_C: 
nameset = dsre->dsre_tn; 
def = dsre->dsre_tn_default; 
break; 

case DBSUBSET_TYPE_FUNCTION_C: 
nameset = dsre->dsre_fn; 
def = dsre->dsre_fn_default; 
break; 

case DBSUBSET_TYPE_SYSSP_C: 
nameset = dsre->dsre_spn; 
def = dsre->dsre_spn_default; 



break; 

case DBSUBSET_TYPE_TRAN_C: 
nameset = dsre->dsre_xn; 
def = dsre->dsre_xn_default; 
break; 

} 

bm_reset_bm(dests); 

if (owner == NULL || owner[0] == NULLCHAR) 
STRCPY(key1, DBSUBSET NONAME S); 
else 

STRCPY(key1, owner); 

if (STRCMP(key1, DBSUBSET_WILDCAST_S) == 0) 
{ 

retry_key1 = CS_FALSE; 

} 

else 
{ 

retry_key1 = CS_TRUE; 

} 

if (name == NULL || name[0] == NULLCHAR) 
STRCPY(key2, DBSUBSET_NONAME_S); 
else 

STRCPY(key2, name); 
Ien1 = STRLEN(keyl); 
Ien2 = STRLEN(key2); 

Ien3 = STRLEN(DBSUBSET_WILDCAST_S); 
resolved = CS_FALSE; 

if ((tmp_entry = (DSRE_ENTRY*)hts_find_2(nameset, 
Ien1, keyl, Ien2, key2)) != NULL) 

{ 

/* Because we are not sure whether tmp_entry->dsre_e_bitmap 

** has a shorter length or not, we need to copy it 

** to a temporary bitmap in order to avoid bm_or_bms() 

** failure. This is the same for the following codes. 
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bm_copy_bm(dests, tmp_entry->dsre_e_bitmap); 
resolved = CS_TRUE; 

} 

if (retry_key1) 
{ 

if ((tmp_entry = (DSRE_ENTRY*)hts_find_2(nameset, 
Ien3, DBSUBSET_WILDCAST_S, 
Ien2, key2)) != NULL) 

{ 

bm_or_bms(dests, tmp_entry->dsre_e_bitmap, dests); 
resolved = CS_TRUE; 

} 

if ((tmp_entry = (DSRE_ENTRY*)hts_find_2(nameset, 
Ien1, keyl, Ien3, DBSUBSET_WILDCAST_S)) != NULL) 

{ 



bm_orJ>ms(dests, tmp_entry->dsre_e_bitmap, dests); 
resolved = CS_TRUE; 

} 

} 

if (! resolved) 
{ 

bm_copy_b m (dests , def ) ; 

} 

} 

I* 

** _DSRE_BUILD_TnFnXnD 

** 

** Type of function: Internal. 

** 

** Purpose: 

** Add a list of siteid to a DSRE 

** 

** Parameters: 

** DISTJNFO *dist_info (input) 

** A structure containing all information about the DIST 
** thread. 

** LL HDR *hdr (input) 

** A linked list holding the siteids to be added into the DSRE. 

** of the DIST thread. 

** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre becomes an active database resolution engine. 

** 
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STATIC_FUNC VOID_FUNC 

_dsre_build_TnFnXnD(dist_info, hdr, RSHANDLE) 

DISTJNFO *dist_info; 
LL_HDR *hdr; 

RSHANDLE * RSHANDLE; 

{ 

LL_K_SITEID *siteid; 
VOID *sts_obj; 
CSJNT status; 
STS_REPEAT_OBJ *repobj; 
LL_HDR *lst; 

OBJ_DBSUBSETS *nameset; 
RSID tmp_dbrepid; 
CSJNT index; 
DSREJNFO *dsre; 



if (dist_info->dist_dsre == (DSRE_INFO*)NULL) 
{ 

_dsre_init_dsre(dist_info, RSHANDLE); 

} 

dsre = dist_info->dist_dsre; 

siteid = (LL_K_SITEID*)ll_first(hdr); 

while (siteid != (LL_K_SITEID*)NULL) 

{ 

if (sts_get_obj(NULL, T Y PE RSDBRE PS_K E Y2 C , &siteid->repid, 

STS_KEY_STRUCT_C, (VOID**)&sts_obj, RSHANDLE) 

!= SUCCEED) 

{ 

CS_CHARobjid_str[RSID_HEX_STRLEN + 1]; 
RSID_TO_HEX_STR(siteid->repid, objid_str); 
/* Should not happen, raise exception anyway. 7 
exc_raise_except io n ( EXC_R ET R YA B L E_M , 

ERR_MKERR(DDL, DDLUNKNOWNOBJ), 

TRUE, _LINE_, _FILE_, 

objid_str); 

} 

status = ((OBJ_RSDBREPS*) 

GET_SHARERESOURCE(sts_obj))->obj_dbrep.dbrep_status; 

sts_obj = sts_free_obj(sts_obj, RSHANDLE); 

if ((status & DBREP_ST_TABLES1_M) || 

(status & DBREP_ST_FUNCTIONS1_M) || 

(status & DBREP_ST_TRANS1_M) || 

(status & DBREP_ST_SYSSP1_M)) 

{ 

OBJ_RSDBSUBSETS *tmpset; 

if (sts_get_obj(NULL, TYPE_RSDBSUBSETS_KEY3_C, 
&siteid->repid, STS_KEY_STRUCT_C, 
(VOID**)&sts_obj, _RSHANDLE) != SUCCEED) 

{ 

CS_CHAR objid_str[RSID_H EX STRLEN + 1]; 

RSID_TO_HEX_STR(siteid->repid, objid_str); 

/* Should not happen, raise exception anyway. 7 

exc_raise_exception(EXC_RETRYABLE_M, 
ERR_MKERR(DDL, DDL_UNKNOWN_OBJ), 

TRUE, _LINE_, FILE , 

objid_str); 

} 

repobj = (STS_REPEAT_OBJ*) GET_SHARERESOURCE(sts_obj); 
1st = &repobj->repobj_llhdr; 

nameset = (OBJ_DBSUBSETS*)MALLOC(sizeof(OBJ_DBSUBSETS) 
*ll_list_len(lst)); 

for (index=0, tmpset=(OBJ_RSDBSUBSETS*)ll_first(lst); 
tmpset != (OBJ_RSDBSUBSETS*)NULL; 
index++, 

tmpset = (OBJ_RSDBSUBSETS*)ll_next(lst, 
&tmpset->obj_basic.obj_linked_entry)) 



{ 

MEMCPY(&nameset[index], &tmpset->obj_dbsubset, 
sizeof(OBJ_DBSUBSETS)); 

} 

sts_obj = sts_free_obj(sts_obj, RSHANDLE); 

} 

else 
{ 

nameset = (OBJ_DBSUBSETS*)NULL; 
index = 0; 

} 

_dsre_add_TnFnXnD_entry(dsre, status, nameset, index, 
siteid->dbid, siteid->allow_truncate, 

RSHANDLE); 

RSID_COPY(tmp_dbrepid, siteid->repid); 

/* We have multiple subscription site for the same 

** database repdef. 
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while ((siteid = (LL_K_SITEID*)ll_next(hdr, 
&siteid->ele.link)) != (LL_K_SITEID*)NULL && 
RSID_CMP(siteid->repid, tmp_dbrepid) ==0) 

{ 

_dsre_add_TnFnXnD_entry(dsre, status, nameset, index, 
siteid->dbid, siteid->allow_truncate, 
RSHANDLE); 

} 

if (nameset != (OBJ_DBSUBSETS*)NULL) 
FREE(nameset); 

} 

} 

/* 

** DSREADDTnFnXnDENTRY 

** 

** Type of function: Internal. 

** 

** Purpose: 

** Add a list of nameset with a dbid to a DSRE 

** 

** Parameters: 

** DSREJNFO *dsre (input/output) 

** A structure to add the sites to. 

** CSJNT status (input) 

** The status of the related dbrep. 

** OBJ_DBSUBSETS *namesets (input) 

** An array of namesets to be added for the input dbid. 

** CSJNT len (input) 

** Size of the namesets array. 

** SITEID dbid (input) 

** The dbid which those namesets will be added for. 
** CS_BOOL truncate (input) 



** Does this site subscribe to truncate table. 
** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre get more item inserted into its hash tables. 
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STATIC_FUNC VOID_FUNC 

_dsre_add_TnFnXnD_entry(dsre, status, nameset, len, dbid, truncate, RSHANDLE) 

DSREJNFO *dsre; 
CSJNT status; 
OBJ_DBSUBSETS *nameset; 
CSJNT len; 
SITEID dbid; 
CS_BOOL truncate; 
RSHANDLE * RSHANDLE; 

{ 

CSJNT index, htsjndex; 
HTS_TABLE *tmp_table; 
BM_STRUCT **tmp_def; 
CSJNT st1, St2; 
SM_SITEJD sitejndex; 
DSRE_ENTRY *tmp_entry; 
CS_CHAR *key1, *key2; 
CSJNT Ien1, Ien2; 
CS_CHAR type; 

CSJNT allst1[NUM_NSI_TABLES]; 

CS_INT allst2[NUM_NSI_TABLES]; 

HTS_TABLE *alltables[NUM_NSI_TABLES]; 

BM STRUCT **alldefaults[NUM_NSI_TABLES]; 

CSJNT numjDits; 

M E M EXPAN D_H D R *memhdr; 

CS_INT synclnfo; 

allst1[0] = DBREP_ST_TABLES1_M; 
allst1[1] = DBREP_ST_FUNCTIONS1_M; 
allst1[2] = DBREP_ST_TRANS1_M; 
allst1[3] = DBREP_ST_SYSSP1_M; 
allst2[0] = DBREP_ST_TABLES2_M; 
allst2[1] = DBREP_ST_FUNCTIONS2_M; 
allst2[2] = D B R E P_ST_T R A N S2M ; 
allst2[3] = DBREP_ST_SYSSP2_M; 
alltables[0] = dsre->dsrejn; 
alltables[1] = dsre->dsrejn; 
alltables[2] = dsre->dsre_xn; 
alltables[3] = dsre->dsre_spn; 



alldefaults[0] = &(dsre->dsre_tn_default); 
alldefaults[1] = &(dsre->dsre_fn_default); 
alldefaults[2] = &(dsre->dsre_xn_default); 
alldefaults[3] = &(dsre->dsre_spn_default); 

site_index = sm_get_index(SM_GLOBAL_INFO, dbid, RSHANDLE); 

num_bits = sm_get_num_sites(SM_GLOBAL_INFO, RSHANDLE); 

bm_expand_bm(num_bits, BM_COPY_C, &(dsre->dsre_subsites), 
RSHANDLE); 

bm_set_bit(dsre->dsre_subsites, site_index); 

for (index = 0; index < NUM_NSI_TABLES; index++) 

{ 

if (((status & allstl [index]) && (status & allst2[index])) || 
(!(status & allstl [index]) && !(status & allst2[index]))) 

{ 

tmp_table = alltables[index]; 

/* 

** If the db repdef indicate 

** (1) "not replicate {tables|functions|transactions| 

system procedures} in (...) " 
** (2) "replicate {tables|functions|transactions| 

system procedures} (without in clause) 

** 

** We need to update all elements in the hash table. 
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for (hts_index = 0; hts_index < tmp_table->num_slots; 
hts_index++) 

{ 

LLJHDR *hdr; 
LL K ELE 2 *p; 

hdr = &tmp_table->table[hts_index]; 
for (p = (LL_K_ELE_2 *)hdr->head; 

p != (LLKELE2 *) hdr; 

P = (LL_K_ELE_2 *) p->link.next) 

{ 

bm_expand_bm(num_bits, 
BM_COPY_C, 
&(((DSRE_ENTRY*)p->link.item)->dsre_e_bitmap), 

RSHANDLE); 

bm_set_bit(((DSRE_ENTRY*) 
p->link.item)->dsre_e_bitmap, 
site_index); 

} 

} 

} 

} 

/* If nameset is NULL, len must be 0 and therefore we are not 
** falling into the loop below. 
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for (index = 0; index < len; index++) 
{ 



type = nameset[index].dbsubset_type; 

switch (type) 

{ 

case DBSUBSET TYPE TABLE C: 
St1 = DBREP_ST_TABLES1_M; 
St2 = D B R E P_ST_T A B L E S2_M ; 
tmp_table = dsre->dsre_tn; 
tmp_def = &(dsre->dsre_tn_default); 
break; 

case DBSUBSET_TYPE_FUNCTION_C: 
St1 = DBREP_ST_FUNCTIONS1_M; 
St2 = DBREP_ST_FUNCTIONS2_M; 
tmp_table = dsre->dsre_fn; 
tmp_def = &(dsre->dsre_fn_default); 
break; 

case DBSUBSET_TYPE_TRAN_C: 
St1 = D B R E P_ST_T R A N S 1 _M ; 
St2 = D B R E P_ST_T R A N S2_M ; 
tmp_table = dsre->dsre_xn; 
tmp_def = &(dsre->dsre_xn_default); 
break; 

case DBSUBSET_TYPE_SYSSP_C: 
St1 = DBREP_ST_SYSSP1_M; 
St2 = DBREP_ST_SYSSP2_M; 
tmp_table = dsre->dsre_spn; 
tmp_def = &(dsre->dsre_spn_default); 
break; 

default: 

trc_print("Unknown subset type: %d\n", type); 
break; 

} 

keyl = nameset[index].dbsubset_owner; 

key2 = nameset[index].dbsubset_name; 

Ien1 = STRLEN(keyl); 

Ien2 = STRLEN(key2); 

if ((tmp_entry = (DSRE_ENTRY*)hts_find_2( 

tmp_table, Ien1, keyl, Ien2, key2)) == NULL) 

{ 

memhdr= (MEM_EXPAND_HDR*)NULL; 
mem_allocate(&memhdr, 

(BYTE**)&tmp_entry, 

sizeof(DSREENTRY), 

MEM_EXPANSION_C, RSHANDLE); 

tmp_entry->dsre_e_memhdr = memhdr; 

meiTi_unlink_hdr(tmp_entry->dsre_e_meiTihdr, RSHANDLE); 

STRCPY(tmp_entry->dsre_e_owner, keyl ); 
STRCPY(tmp_entry->dsre_e_name, key2); 

bm_get_bm(sm_get_num_sites(SM_GLOBAL_INFO, RSHANDLE), 

sm_get_num_sites(SM_GLOBAL_INFO, RSHANDLE), 

&(tmp_entry->dsre_e_bitmap), RSHANDLE); 



mem_unlink_hdr(tmp_entry->dsre_e^itmap->bm_memhclr, RSHANDLE); 

bm_copy_bm(tmp_entry->dsre_e_bitmap, *tmp_def); 
hts_insert_2(tmp_table, tmp_entry, 

&tmp_entry->dsre_e_h_entry, 

Ien1, tmp_entry->dsre_e_owner, 

Ien2, tmp_entry->dsre_e_name); 

} 

if (!(status & st2)) 
{ 

I* Not negated. 7 

bm_set_bit(tmp_entry->dsre_e_bitmap, site_index); 

} 

else 
{ 

r Negate. 7 

bm_reset_bit(tmp_entry->dsre_e_bitmap, site_index); 

} 

} 

for (index = 0; index < NUM_NSI_TABLES; index++) 
{ 

if (((status & allstl [index]) && (status & allst2[index])) || 
(!(status & allstl [index]) && !(status & allst2[index]))) 

{ 

/* 

** If the db repdef indicate 

** (1) "not replicate {tables|functions|transactions| 

system procedures} in (...) " 
** (2) "replicate {tables|functions|transactions| 

system procedures} (without in clause) 

** 

** We need to store the this site in the related 
** default bitmap. 
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bm_expand_bm(num_bits, 

BM_COPY_C, alldefaults[index], RSHANDLE); 

bm_set_bit(*alldefaults[index], site_index); 

} 

} 

} 

I* 

** LL_K_INS_ASCENT 

** 

** Type of function: Internal. 

** 

** Purpose: 

** Add an item into a list with ascendent order. 

** 

** Parameters: 

** LLJHDR *hdr (input) 

** A linked list the new item being inserted into. 



** VOID *item (input) 

** A data item being inserted into the list. The element is part 
** of the data. 

** LLKELE *ele (input-output) 

** Keyed Linked list element that is added to the head of the list. 
** CSJNT len (input) 
** Length of the key 
**VOID *key (input) 

** Pointer to the key, this should also be part of the data item. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** hdr grows with an item inserted ascendently. 
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STATIC VOID_FUNC 

ll_k_ins_ascent(hdr, item, ele, len, key) 

LLJHDR *hdr; 

VOID *item; 

LL_K_ELE *ele; 

CSJNT len; 

VOID *key; 

{ 

LL K ELE *tmp_ele; 
ele->len = len; 
ele->key = key; 

/* The hdr is an ascent list sorted by key. */ 
if ((LL_K_ELE*)hdr->head == (LL_K_ELE*)hdr) 
{ 

ll_ins_head(hdr, item, &ele->link); 

} 

else 
{ 

tmp_ele = (LL K ELE *) hdr->head; 
while ((tmp_ele != (LL_K_ELE *) hdr) && 

(ll_keycmp(key, tmp_ele->key, MIN(len, tmp_ele->len), 
hdr->strcmp_info, 0) < 0)) 

{ 

tmp_ele = (LL K ELE *) tmp_ele->link.next; 

} 

if (tmp_ele != (LL_K_ELE *) hdr) 
{ 

ll_ins_before(hdr, &tmp_ele->link, 
item, &ele->link); 

} 

else 
{ 



Il_ins_tail(hdr, item, &ele->link); 

} 

} 

} 

/* 

** DSRE_RELEASE_DSRE 

** 

** Type of function: Internal. 

** 

** Purpose: 

** To release the memory ocupied by the DSREJNFO structure. 

** 

** Parameters: 

** DSREJNFO *dsre (input/output) 

** The structure to be released. 

** 

** Returns: 

** VOID. 

** 

** Side Effects: 

** 
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VOID_FUNC 

dsre_release_dsre(dsre, RSHANDLE) 

DSREJNFO *dsre; 

RSHANDLE * RSHANDLE; 

{ 

HTS_TABLE *tmpjable; 

HTS_TABLE *hashtables[NUM_HTS_TABLES]; 

BM_STRUCT *dsre_bms[NUM_DSRE_BITMAPS]; 

CS_INT index, htsjndex; 

hashtables[0] = dsre->dsrejn; 

hashtables[1] = dsre->dsrejn; 

hashtables[2] = dsre->dsre_xn; 

hashtables[3] = dsre->dsre_spn; 

dsre_bms[0] = dsre->dsrejn_default; 

dsre_bms[1] = dsre->dsrejn_default; 

dsre_bms[2] = dsre->dsre_xn_default; 

dsre_bms[3] = dsre->dsre_spn_default; 

dsre_bms[4] = dsre->dsre_subsites; 

for (index = 0; index < NUM_HTS_TABLES; index++) 

{ 

tmpjable = hashtables[index]; 

for (htsjndex = 0; htsjndex < tmpJable->num_slots; 
htsjndex++) 

{ 

LL HDR *hdr; 

LL K ELE 2 *p; 

DSRE_ENTRY *tmp_entry; 

/* Traverse and release the whole list. */ 



hdr = &tmp_table->table[hts_index]; 
p = (LL_K_ELE_2 *)hdr->head; 
while (p != (LL_K_ELE_2 *) hdr) 
{ 

tmp_entry = (DSRE_ENTRY*)p->link.item; 
ll_del(&p->link); 

mem_free(tmp_entry->dsre_e_bitmap->bm_memhdr, RSHANDLE); 

mem_free(tmp_entry->dsre_e_memhdr, RSHANDLE); 

p = (LL_K_ELE_2 *)hdr->head; 

} 

} 

mem_free(tmp_table->memhdr, RSHANDLE); 

} 

for (index = 0; index < NUM DSRE BITMAPS; index++) 
{ 

mem_free(dsre_bms[index]->bm_memhdr, RSHANDLE); 

} 

mem_free(dsre->dsre_memhdr, RSHANDLE); 

} 

I* 

** DSRE_REBUILD_DSRE 

** 

** Type of function: External. 

** 

** Purpose: 

** Rebuilds the database SRE for a distributor and a particular db repdef. 

** 

** Parameters: 

** DISTJNFO *dist_info (input) 

** A structure containing all information about the DIST 
** thread. 

** RSID *dbrepid (input) 

** Pointer to the db repdef ID. 

** RSHANDLE * RSHANDLE 

** Pointer to thread specific info. 

** 

** Returns: 
** VOID. 

** A exception is raised if an error occurs. 

** 

** Side Effects: 

** dist_info->dist_dsre is resynched. 
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VOID_FUNC 

dsre_rebuild_dsre(dist_info, dbrepid, RSHANDLE) 

DISTJNFO *dist_info; 
RSID *dbrepid; 

RSHANDLE * RSHANDLE; 

{ 



OBJ_RSSUBSCRIPTIONS *subrow; 
LL_HDR subjst; 

MEM_EXPAND_HDR *dsre_memhdr; 
LL K SITEID *siteid; 
KEY15_SUBSCRIPTIONS sub_key; 
VOID *sts_obj; 
STS_REPEAT_OBJ *repobj; 
LL_HDR *rep_llhdr; 
/* No subscriptions yet, do nothing. 7 
if (dist_info->dist_dsre == NULL) 
return; 

RSID_COPY(sub_key.sub_objid, *dbrepid); 
sub_key.sub_primary_sre = 1 ; 

if (sts_get_obj((STS_HANDLE*)NULL, TYPE_RSSUBSCRIPTIONS_KEY15_C, 
&sub_key, STS_KEY_STRUCT_C, &sts_obj, RSHANDLE) == SUCCEED) 

{ 

repobj = (STS_REPEAT_OBJ*)GET_SHARERESOURCE(sts_obj); 

rep_llhdr = &repobj->repobj_llhdr; 

ll_init(&sub_lst); 

dsre_memhdr = (MEM_EXPAND_HDR*)NULL; 

for (subrow = (OBJ_RSSUBSCRIPTIONS*)ll_first(rep_llhdr); 

subrow != (OBJ_RSSUBSCRIPTIONS*)NULL; 

subrow = (OBJ_RSSUBSCRIPTIONS*)ll_next(rep_llhdr, 
&subrow->obj_basic.obj_linked_entry)) 

{ 

mem_allocate(&dsre_memhdr, (BYTE**) &siteid, 

sizeof(LL_K_SITEID), MEM_EXPANSION_C, RSHANDLE); 

SITEID_COPY(siteid->dbid, subrow->obj_sub.sub_dbid); 
RSID_COPY(siteid->repid, subrow- >obj_sub.sub_objid); 
if (subrow->obj_sub.sub_status & SUB_STAT_ALLOW_TRUNC_M) 
siteid->allow_truncate = CS_TRUE; 
else 

siteid->allow_truncate = CS_FALSE; 
/* The subjst is an ascent list sorted by repid. 7 
ll_k_ins_ascent(&sub_lst, siteid, &siteid->ele, 

sizeof(RSID), &siteid->repid); 
/* We drop all subscribing site for this db repdef . 7 
dsre_remove_TnFnXnD_site(dist_info, 

subrow->obj_sub.sub_pdbid, 

siteid->dbid, RSHANDLE); 

} 

sts_obj = sts_free_obj(sts_obj, RSHANDLE); 

_dsre_build_TnFnXnD(dist_info, &sub_lst, RSHANDLE); 

ll_init(&sub_lst); 

mem_free(dsre_memhdr, RSHANDLE); 

} 

} 

// dsre.h 

// Copyright (c) 2004. Sybase, Inc. All Rights Reserved. 

/* 



** Confidential property of Sybase, Inc. 
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r 

** generic/include/dsre.h: 

** 

** This file defines the database SRE data structures. 
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#ifndef dsre 

#def ine dsre 

#include <central.h> 
#include <err.h> 
#include <cmd.h> 
#include <td.h> 
typedef struct _dsre_entry 
{ 

M E M_EX PA N D_H D R *dsre_e_memhdr; /* memory for this structure 7 

HTS_ENTRY_2 dsre_e_h_entry; /* handle in h_table. 7 

CS_CHAR dsre_e_owner[M AX_I D ENT_LEN_C+ 1 ]; 

CS_CHAR dsre_e_name[MAX_IDENT_LEN_C+1 ]; 

BM_STRUCT *dsre_e_bitmap; /* sites subscribe to this name 7 
} DSRE_ENTRY; 
typedef struct _dsre_info 
{ 

M E M EX P A N D_H D R *dsre_memhdr; /* memory for this structure 7 
HTS_TABLE *dsre_tn; /* Table NSI. 7 
HTS_TABLE *dsre_fn; /* Function NSI. 7 
HTS_TABLE *dsre_xn; I* Transaction NSI. 7 
HTS_TABLE *dsre_spn; /* System Procedure NSI. 7 
BM_STRUCT *dsre_tn_default; 

/* Default subscription sites for tn 7 
BM_STRUCT *dsre_fn_default; 

/* Default subscription sites forfn 7 
BM_STRUCT *dsre_xn_default; 

/* Default subscription sites for xn 7 
BM_STRUCT *dsre_spn_default; 

/* Default subscription sites for spn 7 
BM STRUCT *dsre_subsites; /* All sites subscribe to us. 7 
} DSREJNFO; 
typedef struct _ll_k_siteid 
{ 

SITEID dbid; 
RSID repid; 

CS_BOOL allow_truncate; 
CS_BOOL is_article; 
LL K ELE ele; 
} LL_K_SITEID; 

VOID_FUNCdsre_resolve PROTOTYPE(( 
DSRE_INFO *dsre, 
CSJNT type, 
CS_CHAR *owner, 



CS_CHAR *name, 

BM_STRUCT *dests, 

RSHANDLE * RSHANDLE)); 

VOID_FUNC dsre_release_dsre PROTOTYPE^ 

DSRE_INFO *dsre, 

RSHANDLE * RSHANDLE)); 

#endif /*_dsre_7 



